00100	WODO   ;
00200	VLND  0,5;
00300	P2 1 .1,.2;
00400	P3 1 100,1500;
00500	P4 1 C4,C6;
00600	P5 "P4*3";
00700	P6 0;
00800	P7 0;
00900	P8 "P4*1.414";
01000	P9 0;
01100	P10 1 4,8;
01200	P11 F2/P12 F2;
01300	P13 0;
01400	P14 0;
01500	P15 0;
01600	P16 1/P17 F3/P18 F2/END;
01700	
01800	RUN;